home *** CD-ROM | disk | FTP | other *** search
/ Developer Source 4 / developer source - volume 4.iso / parad / nov95 / wendf109.gif < prev   
Graphics Interchange Format  |  1996-07-10  |  12KB  |  363x600  |  4-bit (5 colors)
Labels: text | screenshot | display | number | font | line | parallel
OCR: FIXTABLS.FSL :: MARKBUT :: pushButton* method pushButton(var eventInfo Event) var tcTableLst TCursor endVar action ( DataUnlockRecord) tcTableLst.attach ( TABLELST) tcTableLst.edit() scan tcTableLst: tcTableLst."RebuildFlag" = True tcTableLst. UnlockRecord() endScan endmethod :Edit Line: 10 Col: 1 FIXTABLS.FSL :: UNMARKBUT :: pushButton* method pushButton(var eventInfo Event) var tcTableLst TCursor endVar action ( DataUnlockRecord) tcTableLst. attach ( TABLELST) tcTableLst.edit() scan tcTableLst: tcTableLst."RebuildFlag" = False tcTableLst. UnlockRecord( ) endScan endmethod Edit Line: 11 Col: 1